home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / BlondesBrunettes.dxr / Internal_67_waste cards.ls < prev    next >
Encoding:
Text File  |  2002-01-25  |  1.7 KB  |  55 lines
  1. global waste, foundation, tableau, equal, hotcard, points
  2.  
  3. on beginSprite me
  4.   sprite(18).visible = 0
  5.   sprite(me.spriteNum).visible = 0
  6. end
  7.  
  8. on mouseDown me
  9.   if sprite(me.spriteNum).visible = 1 then
  10.     if me.spriteNum = waste[waste.count].spnum then
  11.       puppetSound(3, "pickcard")
  12.       sprite(me.spriteNum).moveableSprite = 1
  13.       sprite(me.spriteNum).locZ = me.spriteNum + 1000
  14.       sprite(me.spriteNum).loc = the mouseLoc
  15.       if waste.count > 1 then
  16.         sprite(18).member = waste[waste.count - 1].membername
  17.         sprite(18).visible = 1
  18.       else
  19.         sprite(18).visible = 0
  20.       end if
  21.     end if
  22.   end if
  23. end
  24.  
  25. on mouseUp me
  26.   if sprite(me.spriteNum).moveableSprite = 1 then
  27.     if (equal = 1) and (hotcard <> 0) then
  28.       puppetSound(3, "pickcard")
  29.       sprite(me.spriteNum).moveableSprite = 0
  30.       sprite(me.spriteNum).visible = 0
  31.       sprite(me.spriteNum).loc = waste[waste.count].location
  32.       sprite(me.spriteNum).locZ = me.spriteNum
  33.       sprite(hotcard).member = sprite(the clickOn).member
  34.       sprite(hotcard).visible = 1
  35.       if (hotcard >= 28) and (hotcard <= 35) then
  36.         foundation[makesymbol(hotcard)].addCard(new(script("card"), hotcard))
  37.         points = points + 15
  38.       end if
  39.       if (hotcard >= 56) and (hotcard <= 143) then
  40.         tableau[makesymbol(sprite(hotcard).myrow)].addCard(new(script("card"), hotcard))
  41.       end if
  42.       waste.deleteAt(waste.count)
  43.       if waste.count > 0 then
  44.         sprite(me.spriteNum).visible = 1
  45.         sprite(me.spriteNum).member = waste[waste.count].membername
  46.       end if
  47.     else
  48.       puppetSound(3, "dropcard")
  49.       sprite(me.spriteNum).moveableSprite = 0
  50.       sprite(me.spriteNum).loc = waste[waste.count].location
  51.       sprite(me.spriteNum).locZ = me.spriteNum
  52.     end if
  53.   end if
  54. end
  55.